(do_autoload): Don't report autoload failure

if the autoload definition now is a different one.

diff --git a/src/eval.c b/src/eval.c
index 7a3a923e0dae14d7c5614156b653a2f80b13b797..cbd73a76d0c538a23b42d2c8040437bfa68da7ce 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -1415,8 +1415,7 @@ do_autoload (fundef, funname)
 
   fun = Findirect_function (fun);
 
-  if (XTYPE (fun) == Lisp_Cons
-      && EQ (XCONS (fun)->car, Qautoload))
+  if (!NILP (Fequal (fun, fundef)))
     error ("Autoloading failed to define function %s",
           XSYMBOL (funname)->name->data);
 }